home *** CD-ROM | disk | FTP | other *** search
/ SuperHack / SuperHack CD.bin / SCRIPTZ / NUMB.ZIP / FSERVE / ALIASES.INI next >
INI File  |  1997-03-04  |  23KB  |  464 lines

  1. [Users]
  2. n0=10:*!*NUMB@*.headwaters.com
  3. n1=10:MaDdXnEsS!*ntichrist@remote_112.headwaters.com
  4. n2=10:*!*NTICHRIST@204.101.212.*
  5.  
  6. [Commands]
  7. n0=;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  8. n1=;~~~~~~~~~~~~~~~~~~~~~~~~~PING REPLYS~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  9. n2=1:PING:/notice # $nick Hmmm......Ping yah well fuck off asshole.
  10. n3=2:PING:/notice # $nick Well I guess you can ping me, just Don't make it a habbit. :▐
  11. n4=3:PING:/notice # $nick Ok your ping is ok
  12. n5=4:PING:/notice # $nick Ok your ping is ok
  13. n6=5:PING:/notice # $nick Why is a BOT pinging me?????????? | /notice $me unless your bot pinged you, you have set up you users incorrectly
  14. n7=6:PING:/notice # $nick Thanx
  15. n8=7:PING:/notice # $nick Thank you
  16. n9=8:PING:/notice # $me Ummmmmmmmmmmmmmmmmmmmmmm | /notice $me If you are getting this message you user list is set up wrong.
  17. n10=9:PING:/notice # $me Ummmmmmmmmmmmmmmmmmmmmmm | /notice $me If you are getting this message you user list is set up wrong.
  18. n11=10:PING:/notice # $nick Ohh ping!!!!! 8~)
  19. n12=;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  20. n13=;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ANSWERING MACHINE~~~~~~~~~~~~~~~~~~~
  21. n14=~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  22. n15=1:NUMB:/notice $nick 14,1-15,1-14,1-4,1{14,1-4,1 ±█MB v1.0 beta 14,1-4,1}14,1-15,1-14,1- Is NOT a war script, cause they suck, but it has flood prot. for almost every flood known!! goto 3,1===4,1> http://credit.headwaters.com/spooky/chained.html 4,1<3,1=== To get it.   
  23. n16=10:SAY:/msg %clone.chan $parm2 $parm3 $parm4 $parm5 $parm6 $parm7 $parm8 $parm9 $parm10 $parm11 $parm12 $parm13 $parm14 $parm15 $parm16 $parm17 $parm18 $parm19 $parm20 $parm21 $parm22 $parm23 $parm24 $parm25 $parm26 $parm27 $parm28 $parm29 $parm30 $parm31 $parm32 $parm33 $parm34 $parm35 $parm36 $parm37 $parm38 $parm39 $parm40 $parm41 $parm42 $parm43 $parm44 $parm45 $parm46 $parm47 $parm48 $parm49 $parm50
  24. n17=10:JOIN:/join $parm2
  25. n18=10:PART:/part $parm2
  26. n19=10:Quit:/quit 
  27. n20=10:yournick:/nick $parm2
  28.  
  29. [Events]
  30. n0=#SWEAR start
  31. n1=+1!:ON TEXT:*fuck*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!
  32. n2=+1!:ON TEXT:*shit*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!.
  33. n3=+1!:ON TEXT:*ass*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!! 
  34. n4=+1!:ON TEXT:*dick*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!! 
  35. n5=+1!:ON TEXT:*pussy*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!
  36. n6=+1!:ON TEXT:*bitch*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!
  37. n7=+1!:ON TEXT:*cunt*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!
  38. n8=+1!:ON TEXT:*nigger*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!
  39. n9=+1!:ACTION:*fuck*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!
  40. n10=+1!:ACTION:*shit*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!
  41. n11=+1!:ACTION:*ass*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!
  42. n12=+1!:ACTION:*dick*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!
  43. n13=+1!:ACTION:*pussy*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!
  44. n14=+1!:ACTION:*bitch*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!
  45. n15=+1!:ACTION:*cunt*:#:/kick $chan $nick [±█MB v1.0 beta] Watch the language!, I have virgin Ears!!!
  46. n16=#SWEAR end
  47. n17=#topic disabled
  48. n18=1!:ON TOPIC:#:/topic $chan  %deftopic | /mode # +t | timer3 1 10 /topic # <\/\/╩ ╤ΩΘ╨ ┼ ±╚w t╪Pε╟> 
  49. n19=#topic end
  50. n20=#TextFlood start
  51. n21=*1!:ON TEXT:*:#:/.auser 100 $nick | /.timer 1 3 /.ruser $nick
  52. n22=*1!:ON ACTION:*:#:/.auser 100 $nick 3 | /.timer 1 3 /.ruser $nick
  53. n23=*1!:ON NOTICE:*:#:/.auser 100 $nick | /.timer 1 3 /.ruser $nick
  54. n24=*+100:ON TEXT:*:#:/.auser 101 $nick | /.timer 1 3 /.ruser $nick
  55. n25=*+100:ON NOTICE:*:#:/.auser 101 $nick | /.timer 1 3 /.ruser $nick
  56. n26=*+100:ON ACTION:*:#:/.auser 101 $nick | /.timer 1 3 /.ruser $nick
  57. n27=*+101:ON TEXT:*:#:/.auser 102 $nick | /.timer 1 3 /.ruser $nick | /set %textnick $nick | /set %textchan $chan | /echo 6 Press Shift+F3 To Kick a Flooder!
  58. n28=*+101:ON NOTICE:*:#:/.auser 102 $nick | /.timer 1 3 /.ruser $nick | /set %textnick $nick | /set %textchan $chan | /echo 6 Press Shift+F3 To Kick a Flooder!
  59. n29=*+101:ON ACTION:*:#:/.auser 102 $nick | /.timer 1 3 /.ruser $nick | /set %textnick $nick | /set %textchan $chan | /echo 6 Press Shift+F3 To Kick a Flooder!
  60. n30=*+102:ON TEXT:*:#:/.auser 103 $nick | /.timer 1 3 /.ruser $nick
  61. n31=*+102:ON NOTICE:*:#:/.auser 103 $nick | /.timer 1 3 /.ruser $nick
  62. n32=*+102:ON ACTION:*:#:/.auser 103 $nick | /.timer 1 3 /.ruser $nick
  63. n33=*+103:ON TEXT:*:#:/.auser 104 $nick | /.timer 1 3 /.ruser $nick
  64. n34=*+103:ON NOTICE:*:#:/.auser 104 $nick | /.timer 1 3 /.ruser $nick
  65. n35=*+103:ON ACTION:*:#:/.auser 104 $nick | /.timer 1 3 /.ruser $nick
  66. n36=*+104:ON TEXT:*:#:/.ruser $nick | /kick # $nick [NUMB v1.0] Text Flood Detected!  | /.ruser $nick 1
  67. n37=*+104:ON NOTICE:*.#:/.ruser $nick | /kick # $nick [NUMB v1.0] Text Flood Detected!  | /.ruser $nick 1
  68. n38=*+104:ON ACTION:*:#:/.ruser $nick | /kick # $nick [NUMB v1.0] Action Flood Detected! | /.ruser $nick 1
  69. n39=#TextFlood end
  70. n40=#msgFlood start
  71. n41=*1!:ON TEXT:*:?:/.auser 20 $nick | /.timer 1 3 /.ruser $nick
  72. n42=*1!:ON NOTICE:*:?:/.auser 20 $nick | /.timer 1 3 /.ruser $nick
  73. n43=*1!:ON ACTION:*:?:/.auser 20 $nick | /.timer 1 3 /.ruser $nick
  74. n44=*+20:ON TEXT:*:?:/.auser 21 $nick | /.timer 1 3 /.ruser $nick
  75. n45=*+20:ON NOTICE:*:?:/.auser 21 $nick | /.timer 1 3 /.ruser $nick
  76. n46=*+20:ON ACTION:*:?:/.auser 21 $nick | /.timer 1 3 /.ruser $nick
  77. n47=*+21:ON TEXT:*:?:/.auser 22 $nick | /.timer 1 3 /.ruser $nick | /set %msgnick $nick | /echo 6 Press Shift+F4 To Ignore a Flooder!
  78. n48=*+21:ON NOTICE:*:?:/.auser 22 $nick | /.timer 1 3 /.ruser $nick | /set %msgnick $nick | /echo 6 Press Shift+F4 To Ignore a Flooder!
  79. n49=*+21:ON ACTION:*:?:/.auser 22 $nick | /.timer 1 3 /.ruser $nick | /set %msgnick $nick | /echo 6 Press Shift+F4 To Ignore a Flooder!
  80. n50=*+22:ON TEXT:*:?:/.auser 23 $nick | /.timer 1 3 /.ruser $nick
  81. n51=*+22:ON NOTICE:*:?:/.auser 23 $nick | /.timer 1 3 /.ruser $nick
  82. n52=*+22:ON ACTION:*:?:/.auser 23 $nick | /.timer 1 3 /.ruser $nick
  83. n53=*+23:ON TEXT:*:?:/.auser 24 $nick | /.timer 1 3 /.ruser $nick
  84. n54=*+23:ON NOTICE:*:?:/.auser 24 $nick | /.timer 1 3 /.ruser $nick
  85. n55=*+23:ON ACTION:*:?:/.auser 24 $nick | /.timer 1 3 /.ruser $nick
  86. n56=*+24:ON TEXT:*:?:/.ruser $nick | /ignore -tnpu60 $nick 3 | /.ruser $nick 1 | /notice $nick [NUMB v1.0] Text Flood Detected. Auto ignored for 60 Seconds. | /echo 6 FLOOD PROTECTION: Recieved a Text Flood  from $nick ( $+ $address $+ )
  87. n57=*+24:ON NOTICE:*:?:/.ruser $nick | /ignore -tnpu60 $nick 3 | /.ruser $nick 1 | /notice $nick [NUMB v1.0] Notice Flood Detected. Auto ignored for 60 Seconds. | /echo 6 FLOOD PROTECTION: Recieved a Notice Flood  from $nick ( $+ $address $+ )
  88. n58=*+24:ON ACTION:*:?:/.ruser $nick | /ignore -tnpu60 $nick 3 | /.ruser $nick 1 | /notice $nick [NUMB v1.0] Action Flood Detected. Auto ignored for 60 Seconds. | /echo 6 FLOOD PROTECTION: Recieved a Action Flood  from $nick ( $+ $address $+ )
  89. n59=#msgFlood end
  90. n60=#NickFlood start
  91. n61=*1!:ON NICK:/.ruser $nick | /.auser 2 $nick | /.timer 1 4 /.ruser $nick
  92. n62=*+3:ON NICK:/.ruser $nick | /.auser 4 $newnick | /.timer 1 4 /.ruser $nick
  93. n63=*+4:ON NICK:/.ruser $nick | /ban # $newnick 3 | /set %nflood $banmask | /kick # %nflood [NUMB v1.0] Nick Flood Detected! | unset %nflood
  94. n64=#NickFlood end
  95. n65=#textflood+repeat start
  96. n66=1:on text:*:#: {
  97. n67=  if $level($address($nick,2)) == 150 { .guser 200 $nick 2 | .timer 1 9 .ruser *!*@ $+ $site | goto 001 }
  98. n68=  if $level($address($nick,2)) == 200 { .guser 201 $nick 2 | goto 001 }
  99. n69=  if $level($address($nick,2)) == 201 { .guser 202 $nick 2 | goto 001 }
  100. n70=  if $level($address($nick,2)) == 202 { .guser 203 $nick 2 | goto 001 }
  101. n71=  if $level($address($nick,2)) == 203 { .guser 204 $nick 2 | goto 001 }
  102. n72=  if $level($address($nick,2)) == 204 { .guser 205 $nick 2 | .timer 1 4 .ruser *!*@ $+ $site | goto 001  }
  103. n73=  if $level($address($nick,2)) == 205 { .guser 206 $nick 2 | goto 001 }
  104. n74=  if $level($address($nick,2)) == 206 { .guser 207 $nick 2 | goto 001 }
  105. n75=  if $level($address($nick,2)) == 207 { .guser 208 $nick 2 | echo 4 -a Warning $nick In $chan is at level 208. | goto 001 }
  106. n76=  if $level($address($nick,2)) == 208 { .guser 500 $nick 2 | echo 4 -a Warning $nick In $chan is at level 209. About to be kicked and baned. | goto 001 }
  107. n77=  if $level($address($nick,2)) == 500 { ban -u60 $chan $nick 2 | kick $chan $nick Flood }
  108. n78=  if $level($address($nick,3)) == 600 { ban -u90 $chan $nick 3 | kick $chan $nick $read -s $+ $address($nick,3) c:\numb\bans.txt }
  109. n79=  :001
  110. n80=  if $me isop $chan {
  111. n81=    if $parms == [ %repeat., [ $+ [ $nick ] ] ] { inc %repeat.` $+ $nick 1 | .timer 1 10 ruser  %repeat.` $+ $nick 1
  112. n82=      if [ %repeat.` [ $+ [ $nick ] ] ] >= 2 { kick $chan $nick No need to repeat 3 times | unset [ %repeat.` [ $+ [ $nick ] ] ] [ %repeat.. [ $+ [ $nick ]  ] ] [ %repeat., [ $+ [ $nick ] ] ] }
  113. n83=      goto end
  114. n84=    }
  115. n85=    unset [ %repeat.` [ $+ [ $nick ] ] ]
  116. n86=    set %repeat.. $+ $nick $nick
  117. n87=    set %repeat., $+ $nick  $parms
  118. n88=  }
  119. n89=  :end
  120. n90=}
  121. n91=#textflood+repeat end
  122. n92=#toobig disabled
  123. n93=1:on text:*:#:if ($len($parms) >= 400) { kick $chan $nick 400+ charaters shorten it and try again }
  124. n94=#toobig end
  125. n95=1:ON TEXT:âââ*:#: {
  126. n96=  ignore *!*@ $+ $address
  127. n97=  timer 1 15 /ignore -r *!*@* $+ $address
  128. n98=  kick $chan $nick Borg Sucks
  129. n99=}
  130. n100=1:ON TEXT:âKâ*:#: {
  131. n101=  ignore *!*@ $+ $address
  132. n102=  timer 1 15 /ignore -r *!*@* $+ $address
  133. n103=  kick $chan $nick KillerTalk Sucks
  134. n104=}
  135. n105=#spilt start
  136. n106=1:ON QUIT:#: {
  137. n107=  IF (irc* ISIN $parms) {
  138. n108=    echo 4 *** Possible Split: $parms
  139. n109=  }
  140. n110=}
  141. n111=#split end
  142. n112=100:on join:/ctcp %master ops-master
  143. n113=10:on text:!master:#:/ctcp %master ops-master
  144.  
  145. [Raw]
  146. n0=#dd start
  147. n1=391:*: { set %servertime $parm8 | if (%servertime >= 12:00) { %servertime = %servertime - 12:00 } } }
  148. n2=#dd end
  149. n3=#banned start
  150. n4=368:*:set %now $parms | tet
  151. n5=#banned end
  152.  
  153. [Aliases]
  154. n0=test say $str(300,i)
  155. n1=serv.init {
  156. n2=  echo -a 4,1(»`╖14,1-15,1-4,1{14,1-4,1 %ver 14,1-4,1}15,1-14,1-4,1╖┤»)
  157. n3=  if (%command == $null) {
  158. n4=    set %command $?="What Is Your FSERVE Command? ie.!numb"
  159. n5=  }
  160. n6=  if (%startdir == $null) {
  161. n7=    set %startdir $?="What Is Your Starting Dir? ie.c:\serv"
  162. n8=  }
  163. n9=  if (%ratio == $null) {
  164. n10=    set %ratio $?="What Is Your Ratio?? ie.5"
  165. n11=  }
  166. n12=  if (%credit == $null) {
  167. n13=    set %credit $?="How Many Starting Credits??"
  168. n14=  }
  169. n15=}
  170. n16=top titlebar %ver
  171. n17=/unban { 
  172. n18=  if (% [ $+ [ $$1 [ $+ ban ] ] ] == $null) { echo 12 User2 $$1 12is not banned from your fserve } 
  173. n19=  else { .ruser banned $$1 $+ ! | /unset % [ $+ [ $$1 [ $+ ban ] ] ] |  notice $$1 You have been unbanned from %command } 
  174. n20=} 
  175. n21=/tempban /mode # +b $?="Who?" | .timer 1 60 /mode # -b $! | /kick # $! -:TEMPORARY BAN:- 
  176. n22=/tempban2 /mode # +b $?="Who?" | .timer 1 120 /mode # -b $! | /kick # $! -:TEMPORARY BAN:- 
  177. n23=/tempban3 /mode # +b $?="Who?" | .timer 1 300 /mode # -b $! | /kick # $! -:TEMPORARY BAN:- 
  178. n24=;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  179. n25=/test /set %hihi $fserve(0) | echo 4 -a %hihi | unset %hihi
  180. n26=/closed /.disable #fserve | set %serv.stats Closed | ame 12,1[4,13,1 $+ %command $+ 4,112,1]3,1 Has been Closed! All Existing Serv's WILL be Finished!
  181. n27=/open /.enable #fserve | set %serv.stats OPEN | ame 12,1[4,13,1 $+ %command $+ 4,112,1]3,1 Has been OPENED!!
  182. n28=/timetest .timer 0 40 /set %servfull $fserv(0) { if (%servfull == %maxservs) { goto shutdown } else { goto cont }
  183. n29=  :shutdown
  184. n30=  /.disable #fserve | set %serv.stats Closed | ame 12,1[4,13,1 $+ %command $+ 4,112,1]3,1 Has been Closed! Due To Full State Sorry 
  185. n31=  :cont
  186. n32=  halt
  187. n33=}
  188. n34=/full /ame : 12,14,1 $+ %command $+ 12,13,1 Is FULL
  189. n35=/dirban % [ $+ [ %dirnick [ $+ ban ] ] ] = Because You Typed CD.. In My Starting Dir  %startdir  | notice %dirnick Sorry, you have been banned from my fserve:  $+ % [ $+ [ %dirnick $+ ban ] ] $+  | .guser 999 %dirnick | /unset % [ $+ [ %dirnick [ $+ leech ] ] ] | close -f $nick
  190. n36=/dirtake /msg %dirnick I have taken %dirlose credits from you for typing cd.. in my starting dir  %startdir  | /dec % $+ ( $+ %dirnick $+ )  %dirlose | /msg %dirnick You now have % [ $+ [ ( [ $+ [ %dirnick [ $+ [ ) ] ] ] ] ] ] credits.
  191. n37=/servstats {
  192. n38=  echo -a 12,1-: $+ $me $+ 12,1:-0,1 Current Fserve Stats:
  193. n39=  echo -a 12,1Your FSERVE is:3,1 %serv.stats  
  194. n40=  echo -a 12,1Command:3,1 %command 
  195. n41=  echo -a 12,1Starting Credits:3,1 %credit 
  196. n42=  echo -a 12,1Starting DIR:3,1 %startdir 
  197. n43=  echo -a 12,1Number Of servs allowed:3,1 %maxserv 
  198. n44=  echo -a 12,1Current Number of servs:3,1 $fserv(0) 
  199. n45=}
  200. n46=/massnotice {
  201. n47=  /set -q %i 0
  202. n48=  :main
  203. n49=  /inc -q %i
  204. n50=  %nick = $nick(%i,#)
  205. n51=  if (%nick == $null) halt
  206. n52=  if (%nick != $me) goto notice
  207. n53=  goto main
  208. n54=  :notice
  209. n55=  if (*1 == $null) notice %nick $1 $2 $3 $4 $5 $6 $7 $8 $9 $10 $11 $12 $13 $14 $15 $16 $17 $18 $19 $20 $21 $22 $23 $24 $25 $26 $27 $28 $29 $30
  210. n56=  else notice %nick $1 $2 $3 $4 $5 $6 $7 $8 $9 $10 $11 $12 $13 $14 $15 $16 $17 $18 $19 $20 $21 $22 $23 $24 $25 $26 $27 $28 $29 $30
  211. n57=  goto main
  212. n58=}
  213. n59=/ad { 
  214. n60=/massnotice 3,1Hey, My FSERVE is 4,13,1 $+ %serv.stats $+ 4,13,1!! Type 12,10,1 $+ %command $+ 12,13,1 To Get In 12,1[4,11: $+ %ratio $+ 12,1]3,1 RATIO!, AND 12,1[4,1 $+ %credit $+ 12,1]3,1 Credit's To start!!! 12,1[4,10,1 $+ %ver $+ 4,112,1] }
  215. n61=}
  216. n62=/ad2 {
  217. n63=/ame  3,1Hey, My FSERVE is 4,13,1 $+ %serv.stats $+ 4,13,1!! Type 12,10,1 $+ %command $+ 12,13,1 To Get In 12,1[4,11: $+ %ratio $+ 12,1]3,1 RATIO!, AND 12,1[4,1 $+ %credit $+ 12,1]3,1 Credit's To start!!! 12,1[4,10,1 $+ %ver $+ 4,112,1] }
  218. n64=}
  219. n65=/stats say # 14,1There are a total of 4,1 $nick(0,#) people 14,1 in 3,1 # 14,1. 15,1[4,1 $opnick(0,#) 14,1OP'ed,4,1 $nopnick(0,#) 14,1Not OP'ed and4,1 $vnick(0,#) 14,1with VOICE15,1]14,1
  220. n66=/nowserving /echo 4 -a 12,1-:14,14,1 $+ $me $+ 14,112,1:-0,1 Now serving 12,1-:14,14,1 $+ %servnick $+ 14,112,1:-
  221. n67=/op /mode # +o $1
  222. n68=deop /mode # -o $1
  223. n69=gets {
  224. n70=set %result 0
  225. n71=set %loop 1
  226. n72=:loop
  227. n73=if %loop > $send(0) goto end
  228. n74=if $send(%loop) == $$1 inc %result
  229. n75=inc %loop
  230. n76=goto loop
  231. n77=:end
  232. n78=return %result
  233. n79=}
  234. n80=in {
  235. n81=set %loop 1
  236. n82=set %number 0
  237. n83=:loop
  238. n84=if %loop > $ial(*,0) goto end
  239. n85=if (($ial(*,%loop).host == $$1) && ($ial(*,%loop).nick ison $$2)) { inc %number
  240. n86=set % $+ $ial(*,%loop).host [ % [ $+ [ $ial(*,%loop).host ] ] ] $+ $ial(*,%loop).nick $+ , $+ $chr(160) }
  241. n87=inc %loop
  242. n88=goto loop
  243. n89=:end
  244. n90=set %nicks % [ $+ [ $$1 ] ]
  245. n91=set %letters [ [ [ $len(%nicks) - 2 ] ] ]
  246. n92=set % $+ $$1 $left(%letters,%nicks) $+ 
  247. n93=unset %nicks | unset %letters
  248. n94=return %number
  249. n95=}
  250. n96=inchan {
  251. n97=set %loop 1
  252. n98=set %number 0
  253. n99=:loop
  254. n100=if %loop > $ial(*,0) goto end
  255. n101=if (($ial(*,%loop).host == $$1) && ($ial(*,%loop).nick ison $$2)) inc %number
  256. n102=inc %loop
  257. n103=goto loop
  258. n104=:end
  259. n105=return %number
  260. n106=}
  261. n107=color {
  262. n108=set %phrase *1
  263. n109=set %loop 1
  264. n110=set %newphrase 0
  265. n111=:loop
  266. n112=if %loop > $len(%phrase) goto end
  267. n113=if $mid(%loop,1,%phrase) isin 0123456789 set %mid  $+ $r(10,15) $+ $mid(%loop,1,%phrase)
  268. n114=else  set %mid  $+ $r(1,15) $+ $mid(%loop,1,%phrase)
  269. n115=if $asc($mid(%loop,1,%phrase)) == 32 set %newphrase %newphrase $+ $chr(160)
  270. n116=else set %newphrase %newphrase $+ %mid
  271. n117=inc %loop
  272. n118=goto loop
  273. n119=:end
  274. n120=say %newphrase
  275. n121=}
  276. n122=fservip {
  277. n123=set %loop 1
  278. n124=:loop
  279. n125=if %loop > $fserv(0) goto end
  280. n126=if $fserv(%loop) == $$1 goto end
  281. n127=inc %loop
  282. n128=goto loop
  283. n129=:end
  284. n130=return $fserv(%loop).ip
  285. n131=}
  286. n132=opin {
  287. n133=set %loop 1
  288. n134=:loop
  289. n135=if %loop > $opnick(0,$$1) goto end
  290. n136=if $opnick(%loop,$$1) == $me { return true | halt }
  291. n137=inc %loop
  292. n138=goto loop
  293. n139=:end
  294. n140=return false
  295. n141=}
  296. n142=unleech {
  297. n143=if (% [ $+ [ $$1 [ $+ leech ] ] ] == $null) { echo 12 User2 $$1 12 does not have leech access } 
  298. n144=else { /unset % [ $+ [ $$1 [ $+ leech ] ] ] |  /notice $$1 You have lost your leech access on %command }
  299. n145=}
  300. n146=unban { 
  301. n147=if (% [ $+ [ $$1 [ $+ ban ] ] ] == $null) { echo 12 User2 $$1 12is not banned from your fserve } 
  302. n148=else { .ruser $$1 $+ ! | /unset % [ $+ [ $$1 [ $+ ban ] ] ] |  notice $$1 You have been unbanned from %command }
  303. n149=}
  304. n150=info { echo 12 12,1User info for  3,14,1 $+ $$1 $+  3,1
  305. n151=if ( % [ $+ [ ( [ $+ [ $$1 [ $+ [ ) ] ] ] ] ] ] == $null ) { echo 12 12,1Credits:3,1 None  }
  306. n152=else { echo 12 12,1Credits:3,1 % [ $+ [ ( [ $+ [ $$1 [ $+ [ ) ] ] ] ] ] ]  }
  307. n153=if ( % [ $+ [ $$1 [ $+ ban ] ] ] == $null ) { echo 12 12,1Ban status: 3,1Not banned } 
  308. n154=else { echo 12 12,1Ban status:3,1 Banned 12,1-:4,1Reason12,1:-0,1 % [ $+ [ $$1 [ $+ ban ] ] ] } 
  309. n155=if ( % [ $+ [ $$1 [ $+ leech ] ] ] == $null) { echo 12 12,1Leech access:3,1 Off }
  310. n156=else { echo 12 12,1Leech access:3,1 On }
  311. n157=if % [ $+ [ $$1 [ $+ [ sent ] ] ] ] == $null echo 12 12,1Files sent from4,1 $$1 3,14,1-:12,104,1:-3,1
  312. n158=else  echo 12 12,1Files sent from4,1 $$1 3,14,1-:12,1 $+ % [ $+ [ $$1 [ $+ [ sent ] ] ] ] $+ 4,1:-3,1
  313. n159=if % [ $+ [ $$1 [ $+ [ download ] ] ] ] == $null echo 12 12,1Files sent to4,1 $$1 3,14,1-:12,104,1:-3,1
  314. n160=else echo 12 12,1Files sent to4,1 $$1 3,14,1-:12,1 $+ % [ $+ [ $$1 [ $+ [ download ] ] ] ] $+ 4,1:-3,1
  315. n161=}
  316. n162=chan {
  317. n163=set %loop 1
  318. n164=set %count 0
  319. n165=:count
  320. n166=if ( $nick(0,$$1) < %loop ) goto next
  321. n167=if ( $level($address($nick(%loop,$$1),1)) == ircop ) inc %count 1
  322. n168=inc %loop
  323. n169=goto count
  324. n170=:next
  325. n171=echo 2 -a 12Hawkee2 $$1 IRCops:12 %count 
  326. n172=echo 2 -a 12Hawkee2 $$1 Ops:12 $opnick(0,$$1)
  327. n173=echo 2 -a 12Hawkee2 $$1 Non-Ops:12 $nopnick(0,$$1)
  328. n174=echo 2 -a 12Hawkee2 $$1 Total Users:12 $nick(0,$$1)
  329. n175=echo 2 -a 12Hawkee2 end of 12 $+ $$1 $+ 2 Status
  330. n176=}
  331. n177=clones {
  332. n178=echo 4 -a 4,10,1 $+ %ver $+ 4,13,1  Searching for clones in 4,112,1 $+ # $+ 4,1
  333. n179=who #SeXPiX
  334. n180=set %loops 1
  335. n181=set %count 1
  336. n182=:loop
  337. n183=if %loops > $nick(%loops,$$1) { goto finish | set %loops 1 }
  338. n184=if $ial($address($nick(%loops,$$1),2),0) > 1 {
  339. n185=if $inchan($remove($address($nick(%loops,$$1),2),*!*@),$$1) == $ial($address($nick(%loops,$$1),2),0) {
  340. n186=  if %done [ $+ [ $address($nick(%loops,$$1),2) ] ] == $null { set % $+ clone $+  $remove($address($nick(%loops,$$1),2),*!*@)  $+ $nick(%loops,$$1) | set %done $+ $address($nick(%loops,$$1),2) 0  }
  341. n187=  else set % $+ clone $+ $remove($address($nick(%loops,$$1),2),*!*@)  [ % [ $+ [ clone [ $+  [ $remove($address($nick(%loops,$$1),2),*!*@) ] ] ] ] ]  $+ , $+ $chr(160) $+ $nick(%loops,$$1) 
  342. n188=  inc %done $+ $address($nick(%loops,$$1),2) 
  343. n189=  if %done [ $+ [ $address($nick(%loops,$$1),2) ] ] == $ial($address($nick(%loops,$$1),2),0) {
  344. n190=    echo 4 -a Clone set 10 $+ %count $+ :12 % [ $+ [ clone [ $+ [ $remove($address($nick(%loops,$$1),2),*!*@) ] ] ] ] $+ 
  345. n191=    echo 4 -a Cloning Address: 14 $+ $remove($address($nick(%loops,$$1),2),*!*@) $+ 2
  346. n192=  inc %count }
  347. n193=}
  348. n194=}
  349. n195=inc %loops | goto loop
  350. n196=:finish
  351. n197=unset %clone*
  352. n198=unset %done*
  353. n199=set %count [ [ %count ] - 1 ]
  354. n200=if %count != $null echo 4 -a 4,10,1 $+ %ver $+ 4,1 Total:12 %count 2clone set(s) in 12 $+ # $+ 2
  355. n201=unset %count
  356. n202=}
  357. n203=/colchk {
  358. n204=set %striplen $len($strip($parms))
  359. n205=set %len $len($parms)
  360. n206=%complen = %len - %striplen
  361. n207=if %complen > 10  goto ban else goto end
  362. n208=:ban
  363. n209=/onotice $chan  7[OP] $nick 12Warned about Exessive Control Codes
  364. n210=ban -u10  $nick 1310 Second Ban Excessive Control Codes.. Dont be annoying!
  365. n211=.auser 524 $nick
  366. n212=.timer 1 10 /.ruser $nick
  367. n213=halt
  368. n214=}
  369. n215=/colkick {
  370. n216=set %striplen $len($strip($parms))
  371. n217=set %len $len($parms)
  372. n218=%complen = %len - %striplen
  373. n219=if %complen > 10  goto ban else goto end
  374. n220=:ban
  375. n221=/onotice $chan  7[OP] $nick 12Being Kicked For Exessive Control Codes
  376. n222=mode # -b $nick
  377. n223=ban -u10  $nick 1310 Second Ban Excessive Control Codes.. Dont be annoying!
  378. n224=kick # $nick 07G13o14d12d7a4m14ná3I12tá14C13o5l2o9r6sá13A7r15eá5A2n8n9o10y15i4n11g  
  379. n225=halt
  380. n226=}
  381.  
  382. [Variables]
  383. n0=%maxserv 5
  384. n1=%path c:\numb\fserve\
  385. n2=%allowed 3
  386. n3=%away no
  387. n4=%sex His
  388. n5=%ver --{- Num▀ v1.0 -}-- FILESERVER
  389. n6=%master MaDdXnEsS
  390. n7=%credit 100000
  391. n8=%minutes 0
  392. n9=%maxgets
  393. n10=%hours 0
  394. n11=%welcome c:\numb\fserve\welcome.txt
  395. n12=%i 45
  396. n13=%nc 0
  397. n14=%takeover
  398. n15=%chan 
  399. n16=%msgnick ChanServ
  400. n17=%join 2
  401. n18=%maxgets 3
  402. n19=%maxsends 5
  403. n20=%serv.stats Closed
  404. n21=%servnick MaDdXnEsS
  405. n22=%loop 1
  406. n23=%command !orgy
  407. n24=%startdir c:\guild\graphic
  408. n25=%ratio 5
  409. n26=%(moosehunter) 100000
  410. n27=%moosehunterdownload 0
  411. n28=%moosehuntersent 0
  412. n29=%^206.149.198.125 moosehunter
  413. n30=%(masss) 18012
  414. n31=%masssdownload 4
  415. n32=%massssent 0
  416. n33=%^161.142.2.236 masss
  417. n34=%(Lor_away) 100000
  418. n35=%Lor_awaydownload 0
  419. n36=%Lor_awaysent 0
  420. n37=%^205.217.61.173 Lor_away
  421. n38=%massscangetc:\guild\graphic\teen\!!!!16f.jpg 161.142.2.236
  422. n39=%(sword6) 41897
  423. n40=%sword6download 3
  424. n41=%sword6sent 1
  425. n42=%^207.12.198.75 sword6
  426. n43=%(JENA_SUCKS_ME) 93643
  427. n44=%JENA_SUCKS_MEdownload 1
  428. n45=%JENA_SUCKS_MEsent 0
  429. n46=%^206.170.121.94 JENA_SUCKS_ME
  430. n47=%temp 9735
  431. n48=%({{{LoNg_DoNG}}}) 15527
  432. n49=%{{{LoNg_DoNG}}}download 3
  433. n50=%{{{LoNg_DoNG}}}sent 0
  434. n51=%^207.176.201.98 {{{LoNg_DoNG}}}
  435. n52=%sword6cangetc:\guild\graphic\teen\15&15fck.jpg 207.12.198.75
  436. n53=%(Withdrawl) 100000
  437. n54=%Withdrawldownload 0
  438. n55=%Withdrawlsent 0
  439. n56=%^206.31.56.65 Withdrawl
  440. n57=%(wmnlvr) 1135910
  441. n58=%wmnlvrdownload 7
  442. n59=%wmnlvrsent 4
  443. n60=%^152.172.205.13 wmnlvr
  444. n61=%wmnlvrcangetc:\guild\graphic\teen\!sweet68.jpg 152.172.205.13
  445. n62=%(rig) 100000
  446. n63=%rigdownload 0
  447. n64=%rigsent 0
  448. n65=%^205.164.88.183 rig
  449. n66=%(taklazin) 41376
  450. n67=%taklazindownload 1
  451. n68=%taklazinsent 0
  452. n69=%^206.207.104.42 taklazin
  453. n70=%(MaDdXnEsS) 100000
  454. n71=%MaDdXnEsSdownload 0
  455. n72=%MaDdXnEsSsent 0
  456. n73=%^204.101.212.127 MaDdXnEsS
  457. n74=%Danielle19download 3
  458. n75=%(Danielle19) 306630
  459. n76=%Danielle19sent 2
  460. n77=%check 9453
  461. n78=%taklazincangetc:\guild\graphic\teen\grlsroom.jpg 206.207.104.42
  462. n79=%(danielson) 9735
  463. n80=%danielsonsent 1
  464.